﻿Imports System.Data.OracleClient
Imports System.Data
Imports ccapps.persistent

Public Class BSCSCampaignDefinition
    Dim DataEngine As New BSCSCampaignDefinition_DAO()

    Public Function GetGeneralTariffList(keyword As String) As DataTable
        Return DataEngine.GetTariffList(keyword)
    End Function

    Public Function GetTariffType(ByVal tmcode As String) As Integer
        Return DataEngine.GetTariffType(tmcode)
    End Function

    Public Function GetTariffLineType(ByVal tmcode As String) As Integer
        Return DataEngine.GetTariffLineType(tmcode)
    End Function

    Public Function GetTariffSegment(ByVal tmcode As String, Optional ByVal type As String = "A") As Integer
        Return DataEngine.GetTariffSegment(tmcode, type)
    End Function

    Public Function GetTariffDeviceSegment(ByVal tmcode As String) As Integer
        Return DataEngine.GetTariffDeviceSegment(tmcode)
    End Function

    Public Function GetGPOSegment(ByVal tmcode As String) As String
        Return DataEngine.GetGPOSegment(tmcode)
    End Function

    Public Function GetGPOList() As DataTable
        Return DataEngine.GetGPOList()
    End Function

    Public Function GetCorpSMS(ByVal tmcode As String) As Integer
        Return DataEngine.GetCorpSMS(tmcode)
    End Function

    Public Function GetPOSTariff(ByVal tmcode As String) As Integer
        Return DataEngine.GetPOSTariff(tmcode)
    End Function

    Public Function GetJETTariff(ByVal tmcode As String) As Integer
        Return DataEngine.GetJETTariff(tmcode)
    End Function

    Public Function GetM2MTariff(ByVal tmcode As String) As Integer
        Return DataEngine.GetM2MTariff(tmcode)
    End Function

    Public Function GetPriceGroupNodes(ByVal lb As ListBox) As DataTable
        Return DataEngine.GetPriceGroupNodes(lb)
    End Function

    Public Function GetProrationInfo(ByVal tmcode As String) As Integer
        Return DataEngine.GetProrationInfo(tmcode)
    End Function

    Public Function GetSegmentType(ByVal tmcode As String) As Integer
        Return DataEngine.GetSegmentType(tmcode)
    End Function

    Public Function GetContentType(ByVal tmcode As String) As Integer
        Return DataEngine.GetContentType(tmcode)
    End Function

    Public Function GetKytDetail(ByVal tmcode As String) As Integer
        Return DataEngine.GetKytDetail(tmcode)
    End Function

    Public Function GetDwhMnoType() As DataTable
        Return DataEngine.GetDwhMnoType()
    End Function

    Public Function GetPriceGroupList() As DataTable
        Return DataEngine.GetPriceGroupList()
    End Function

    Public Function GetSMSItemsToBeWorked() As DataTable
        Return DataEngine.GetSMSItemsToBeWorked()
    End Function

    Public Function GetPriceGroupCountForTariff(ByVal tmcode As String) As Integer
        Return DataEngine.GetPriceGroupCountForTariff(tmcode)
    End Function

    Public Function GetPriceGroupReasonsOfTariff(ByVal tmcode As String, ByVal pg As String) As DataTable
        Return DataEngine.GetPriceGroupReasonsOfTariff(tmcode, pg)
    End Function

    Public Function GetPriceGroupFeeDetailsOfTariff(ByVal tmcode As String) As DataTable
        Return DataEngine.GetPriceGroupFeeDetailsOfTariff(tmcode)
    End Function
End Class


